program Test_sum;
var
	a : integer;
	e : real;
begin
	a := 10 + 666;
	e := 666.0 + 999.0;
end.
